home *** CD-ROM | disk | FTP | other *** search
/ Interplay's Learn to Program Basic (Review Copy) / Learn to Program Basic Review Copy (Interplay)(June 23, 1998).ISO / pc / ltpbasic / refxmpl / cyclespr.bas < prev    next >
BASIC Source File  |  1998-03-09  |  123b  |  8 lines
  1. CLS
  2. soldier = LoadSprite("Soldier1")
  3. SetSprite soldier To 100,100
  4. CycleSprite soldier
  5. Input "Hit return to stop", A$
  6. End
  7.